inherited frmRel_FichaCusto: TfrmRel_FichaCusto
  Left = 175
  Top = 0
  Caption = 'Demonstrativo de Altera'#231#227'o de Pre'#231'o de Custo'
  ClientHeight = 575
  ClientWidth = 535
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 535
    Height = 399
    Align = alTop
    object pb: TGauge
      Left = 6
      Top = 374
      Width = 522
      Height = 20
      ForeColor = clNavy
      Progress = 0
    end
    object Label5: TLabel
      Left = 6
      Top = 168
      Width = 103
      Height = 14
      Caption = 'Divis'#227'o do Produto'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 213
      Top = 168
      Width = 78
      Height = 14
      Caption = 'Departamento'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label1: TLabel
      Left = 10
      Top = 4
      Width = 99
      Height = 14
      Caption = 'Fase de Processo'
    end
    object p_fase: TRadioGroup
      Left = 7
      Top = 15
      Width = 523
      Height = 69
      Columns = 2
      TabOrder = 0
    end
    object p_divisao: TCheckListBox
      Left = 5
      Top = 182
      Width = 200
      Height = 188
      BevelKind = bkFlat
      BorderStyle = bsNone
      ItemHeight = 14
      TabOrder = 3
    end
    object P_departamento: TCheckListBox
      Left = 213
      Top = 182
      Width = 316
      Height = 188
      BevelKind = bkFlat
      BorderStyle = bsNone
      ItemHeight = 14
      TabOrder = 4
    end
    object rgTipo: TRadioGroup
      Left = 7
      Top = 84
      Width = 314
      Height = 81
      Caption = 'Imprimir'
      Items.Strings = (
        'Somente Itens com Aumento'
        'Somente Itens com Diminui'#231#227'o'
        'Todos')
      TabOrder = 1
    end
    object GroupBox1: TGroupBox
      Left = 328
      Top = 84
      Width = 201
      Height = 81
      Caption = 'Per'#237'odo'
      TabOrder = 2
      object Label2: TLabel
        Left = 9
        Top = 22
        Width = 57
        Height = 14
        Caption = 'Data Inicial'
      end
      object Label6: TLabel
        Left = 15
        Top = 50
        Width = 51
        Height = 14
        Caption = 'Data Final'
      end
      object ed_dataini: TDateEdit
        Left = 76
        Top = 20
        Width = 106
        Height = 21
        NumGlyphs = 2
        TabOrder = 0
        OnKeyDown = ed_datainiKeyDown
      end
      object ed_datafim: TDateEdit
        Left = 76
        Top = 48
        Width = 106
        Height = 21
        NumGlyphs = 2
        TabOrder = 1
        OnKeyDown = ed_datafimKeyDown
      end
    end
  end
  inherited Panel2: TPanel
    Top = 505
    Width = 535
    Align = alTop
    inherited bimprimir: TFlatButton
      Enabled = True
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      OnClick = btncancelarClick
    end
  end
  inherited sb: TStatusBar
    Top = 556
    Width = 535
  end
  inherited Panel3: TPanel
    Width = 535
  end
  inherited RDP: TRDprint
    OnNewPage = RDPNewPage
    OnBeforeNewPage = RDPBeforeNewPage
  end
  object AUX: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 412
    Top = 172
    object AUXPro: TStringField
      FieldName = 'Pro'
    end
    object AUXMaiorCusto: TFloatField
      FieldName = 'MaiorCusto'
    end
    object AUXUltCusto: TFloatField
      FieldName = 'UltCusto'
    end
    object AUXTipo: TStringField
      FieldName = 'Tipo'
      Size = 1
    end
  end
end
